home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1997 April: Mac OS SDK / Dev.CD Apr 97 SDK1.toast / Development Kits (Disc 1) / Interfaces&Libraries / Interfaces / AIncludes / Scrap.a < prev    next >
Encoding:
Text File  |  1996-01-24  |  1.9 KB  |  94 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        Scrap.a
  3. ;
  4. ;    Contains:    Scrap Manager Interfaces.
  5. ;
  6. ;    Version:    Technology:    System 7.5
  7. ;                Package:    Universal Interfaces 2.2 in “MPW” on ETO #20
  8. ;
  9. ;    Copyright:    © 1984-1995 by Apple Computer, Inc.
  10. ;                All rights reserved.
  11. ;
  12. ;    Bugs?:        If you find a problem with this file, use the Apple Bug Reporter
  13. ;                stack.  Include the file and version information (from above)
  14. ;                in the problem description and send to:
  15. ;                    Internet:    apple.bugs@applelink.apple.com
  16. ;                    AppleLink:    APPLE.BUGS
  17. ;
  18. ;
  19.  
  20.     IF &TYPE('__SCRAP__') = 'UNDEFINED' THEN
  21. __SCRAP__ SET 1
  22.  
  23.  
  24.     IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
  25.     include 'Types.a'
  26.     ENDIF
  27. ;        include 'ConditionalMacros.a'                                ;
  28. ScrapStuff                 RECORD    0
  29. scrapSize                 ds.l   1        ; offset: $0 (0)
  30. scrapHandle                 ds.l   1        ; offset: $4 (4)
  31. scrapCount                 ds.w   1        ; offset: $8 (8)
  32. scrapState                 ds.w   1        ; offset: $A (10)
  33. scrapName                 ds.l   1        ; offset: $C (12)
  34. sizeof                     EQU *            ; size:   $10 (16)
  35.                         ENDR
  36.  
  37. ; typedef struct ScrapStuff  ScrapStuff
  38. ; typedef ScrapStuff         *PScrapStuff, *ScrapStuffPtr
  39. ;
  40. ; pascal ScrapStuffPtr InfoScrap(void)
  41. ;
  42.     IF ¬ GENERATINGCFM THEN
  43.         _InfoScrap:    OPWORD    $A9F9
  44.     ELSE
  45.         IMPORT_CFM_FUNCTION    InfoScrap
  46.     ENDIF
  47.  
  48. ;
  49. ; pascal long UnloadScrap(void)
  50. ;
  51.     IF ¬ GENERATINGCFM THEN
  52.         _UnloadScrap:    OPWORD    $A9FA
  53.     ELSE
  54.         IMPORT_CFM_FUNCTION    UnloadScrap
  55.     ENDIF
  56.  
  57. ;
  58. ; pascal long LoadScrap(void)
  59. ;
  60.     IF ¬ GENERATINGCFM THEN
  61.         _LoadScrap:    OPWORD    $A9FB
  62.     ELSE
  63.         IMPORT_CFM_FUNCTION    LoadScrap
  64.     ENDIF
  65.  
  66. ;
  67. ; pascal long GetScrap(Handle hDest, ResType theType, long *offset)
  68. ;
  69.     IF ¬ GENERATINGCFM THEN
  70.         _GetScrap:    OPWORD    $A9FD
  71.     ELSE
  72.         IMPORT_CFM_FUNCTION    GetScrap
  73.     ENDIF
  74.  
  75. ;
  76. ; pascal long ZeroScrap(void)
  77. ;
  78.     IF ¬ GENERATINGCFM THEN
  79.         _ZeroScrap:    OPWORD    $A9FC
  80.     ELSE
  81.         IMPORT_CFM_FUNCTION    ZeroScrap
  82.     ENDIF
  83.  
  84. ;
  85. ; pascal long PutScrap(long length, ResType theType, void *source)
  86. ;
  87.     IF ¬ GENERATINGCFM THEN
  88.         _PutScrap:    OPWORD    $A9FE
  89.     ELSE
  90.         IMPORT_CFM_FUNCTION    PutScrap
  91.     ENDIF
  92.  
  93.     ENDIF ; __SCRAP__
  94.